﻿Public Class frmGestionReporte

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If rpt_frm = False Then
            rpt_frm = True
            'mReporte
            Dim reporte As New frmReporte
            reporte.Show()
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If rpt_frm = False Then
            rpt_frm = True
            'mReporte
            Dim reporte As New frmReportesExamen
            rpt_tipo_Examen = ComboBox1.SelectedIndex + 1
            reporte.Show()
        End If
    End Sub

    Private Sub frmGestionarReporte_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        frmreport = False
    End Sub

End Class